home *** CD-ROM | disk | FTP | other *** search
/ Medabots Cardz / Medabots CD Cardz Sumilidon.bin / mac / assets / sumilidon.dxr / 00228_Script_228 < prev    next >
Text File  |  2001-12-07  |  448b  |  29 lines
  1. property mysprite
  2.  
  3. on beginsprite me
  4.   set mysprite to the spritenum of me
  5.   set the blend of sprite mysprite = 0
  6. end
  7.  
  8.  
  9.  
  10. on mouseUp
  11.   --puppetSound 1, "Clicker"
  12.   window("tvguide").forget()
  13.   
  14.   global wTVGUIDE
  15.   wTVGUIDE = window("tvguide")
  16.   wTVGUIDE.visible = true
  17.   open wTVGUIDE
  18.   --  tell window "tvguide"
  19.   --    go to "tvguide"
  20.   --  end tell
  21. end
  22.  
  23. on mouseEnter
  24.   cursor(280)
  25. end
  26.  
  27. on mouseLeave
  28.   cursor(-1)
  29. end